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190 EJECT 7 1 
1391 MRRRAAARKEKTKEKCRE CK KREKKKRKKRECREAAAKCARAMRKRAKRARARARERERRARARRRKRERRAERRKRARNNRR KE 1 
: i132 ™ | ; * i 
eae? 133 © 1/0 BUFFER» VARIABLE BLOCK» AND TRANSFER VECTOR DEFINITIONS " 4 
! . “ 
195 S#¥ERRRKRAKERRRERKRKKRRARRARKRSSREKRRAEKRESC SEK RMR RRERERRRAKAHKARRRRERRMRERKRSE 1 
010150 A 197 OVERS2 SET 42700 MAXIMUM OVERLAY SIZE i 
eoou27 & 198 TFYCSZ SET Qe? FROM-COMPILER TRANSFER VECTOR SIZE i 
000666 A 199 VARBLS SET 0666 VARIABLE BLOCK SIZE 1 
177112 R 200 -VARBLO EGY *-VARBLS VARIABLE BLOCK START ADDRESS i 
i77120 R @02 ERBF  EQU VARBLO+06 ERROR BUFFER { 
177127 R B03 "NERR EAU VARBLD+O15 ERROR COUNT. { 
177160 R €04 SLOT EU VARBLO+O046 SPECIAL LIST BUFFER 1 
177204 R 205 TITL ~. EQU VARBLO+0072 TITLE BUFFER { 
177207 R 206 TITP EAU VARBLO+0075 TITLE PAGE NUMBER { 
ie@v2l2 R 207 TITD EAU VARBLO+0100 TITLE BATE i 
177217? R 208 TITJ -EQU © VaRBLO+0105 TITLE JOB NAME i 
177236 R 209 TITN . EQU VARBLO+G124 . TITLE NAME i 
177243 R 210 TITM EQU VARBLO+O131 TIME i 
177250 R 211 TITQ #&EOQv VARBLOG0126 END 1 
477250 R 212 BLFCB Eau VARBLO+0136 BO FCB { 
177262 R 213 GLFCB. EQU VARBLO+01S50 GO FCB i 
i77274 R 21@ LLFCB EQU VARBLO+O162 LO FCB ‘ 
177306 R £15 PLFCB EOU VARBLO+0174 PL FCB i 
om 
BL 7 9 ee 9 ' 
218 ™ x } 
219 % COMPILER VARIABLE BLODEK " j 
20» " } 
Fo 1 BRE RESPEC REKS KK RECREATE KKK TERA ERE EEE KRALL TE HRERERAK EEE HS i 
ees SRV REP ECR PERAK KR ERERRERAEKEKCRRKRRAHS eH t 
224 ® FIXED ON LOADING BY ROUTINE FORT ® 1 
: ; cot REM RR EK AREER KRAEMER EH 1 
177320 R 226 BOBLFL EGU VARBLO+O206 . BO BLOCKING FLAG { 
177321 R 227 GOBLFL EQU YARBLO+O207 £GO BLOCKING FLAG { 
177322 R 228 LOBLFL EQU VARBLO+0210 LO BLOCKING FLAG { 
177325 R PES PIBLFL EBD VARBLO+O211 PI BLOCKING FLAG 1 
177324 R 230 SPCH . £QU VARBLO+O0212  ##COMPILER CONTROL FLAGS i 
177325 R 231 SECH EU VARBLO+O213 ERROR CONTROL WORD 1 
177326 R 232 DPB EGU VARBLO+0214 ave LABLE CORE START ADDRESS 1 
177327 R 233 DPX fF au VARBLO+0215 AVAGLABLE CORE END ADDRESS i 
ARPS SEL EPS. ES eS ESS eS eS ee ES TT Pe { 
236 ™ CLEARED FOR EACH COMPILATION ¥ 1 
PCPO TTI PITT LILL Tirta eit tT i 
177330 R 239 VBLOBG EQU DPX+1  sParpR OF CLEARED VARIABLES 1 
177330 R 240 AF EQU ELOBG ADDRESS FIELD 01 1 
177331 R 241 AIFW EDU AF +1 “ SCAN EORNARD I PDINTER 01 1 
177332 R 242 AS Eau BIE WS ARRAY SUBSCRIPTS _. 07 1 
177341 R 243 AT EMU AS+?7 ADIERESS TYPE 01 1 
177342 R 244 BDF EDU aT4+1 BLOCK DATA FLAG O1 1 
177343 R 245 BOELCN EQU BDF+1 BO BLOCKING FLAG 01 4 
177344 R 246 CF EQU ROBLCN41 SCAN COMPLIMENT FLAG 01 i 
177345 R 247 CFPTSW EQU Cr+ FINGL POINT CHECK SWITCH 1 1 
177346 R 248 CL. EU CFPTSH+1 gc 01 1 
177347 R Bes CLOP €0U CL+1 LIST OUTPUT PACK COUNT 01 1 
177350 R 250 CHFL €¢U CLOoP+41 COMMON FLAGS OL ft 
177351 R 251 CNP- EQU CMFL+1 COMMON NAME POINTER 01 1 
177352 R 252 D EQU CNP+1 DO POINTER 01 1 
177352 R 2523 DF EQU D+1 DELIMITER FLAG 1 1 
177354 R 254 DEPP Eau DF 41 FLOATING POINT BISABLE FLAG G1 i 
177355 R. 255 BH EQU DEPP +1 DO LIMIT POINTER o1 ft 
177356 R 256 DI EQU BH+1 DO INCREMENT POINTER G1 4 
177357 R 257 DPCA  EQU DI+i DATA POOL CONTSANTS - I-PDINTER FOR: ‘ 
258 * : 192:0:430.0,0D0:ASCrSART: IFIXsFLOAT 3 
259 # .<15 DFLGAT 1 
177373 KR #260 DR EOL DPCAt12 DO RETURN ADDRESS ‘ 
177374 R £61 D083 EQu DR +1 01 1 
177375 R 262 DSAY EGU nil DT SAVE FOR RD/UR PROCESSING O1 i 
177376 R 2623 DT EQU nSAvel DO TOP PDINTER 1 4 
177377 R 264 DTIFL  EQU DT +1 DO TERMINATION FLAS be 1 
177401 R 265 DY FQU DIFL+¢2 DO VARIABLE POINTER Oi fi 
i77402 R #266 EC EQU V+! ERROR COUNT Oi ft 
177403 R 267 EH EQU C+ EXPRESSION HIERARCHYS 02 4 
177405 R 268 EHBK  EQU H+2 SCAN BACKWARD EXPRESSION HEIRARCHY oi i 
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177422 R #278 INEP Feu [M41 INPUT BUFFER POINTER Gi 4 
177423 R e793 IOFL  EOu NBR 41 170 FLAG d1 i 
177424 R 280 IP FaU [CFL+1 ARRAY POINTERS 09 1t 
177435 R e281 I8 EAU TP+9 ARRAY DIMENSIONS 03 1 
177445 R 282 IT FOU 1548 ASSIGNMENT TOP POINTER 01 1 
177446 R 283 10 EDU Ute! ITEM USAGE 01 1 
177447 R 284 J ERU lu4] TRIAD POINTER 01 1 
177450 R 285 JPFL Eau 3+] JUMP FLAGS 04 1 
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